home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 April / EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso / EARCD / biz / demo / FamCon35a_demo.lha / FamCon / FamConView next >
Text File  |  1995-05-29  |  632b  |  25 lines
  1. .bra {
  2. .ket }
  3. .key FILE/A,TITLE
  4. ;
  5. ; This shell script will attempt to locate a viewer for the presentation
  6. ; of a FamilyConnections-created listing. The preferences are:
  7. ;
  8. ;   new_viewer
  9. ;   MultiView
  10. ;   More
  11. ;   Type (gack!)
  12. ;if exists FamCon_viewer
  13. ;  FamCon_viewer {FILE} {TITLE}
  14. if exists FamCon_root:new_viewer
  15.   FamCon_root:new_viewer {FILE} title = "{TITLE}" screen_name = "FamCon_screen"
  16. else if exists sys:utilities/MultiView
  17.   sys:utilities/MultiView {FILE} pubscreen=FamCon_screen
  18. else if exists More
  19.   More {FILE}
  20. else if exists Type
  21.   Type {FILE}
  22. else
  23.   echo "Sorry... I couldn't find a viewer for your report!"
  24. endif
  25.